home *** CD-ROM | disk | FTP | other *** search
/ A Brief History of Time - An Interactive Adventure / A Brief History of Time: An Interactive Adventure.iso / pc / 06.dir / 00320_Script_320 < prev    next >
Text File  |  1995-07-27  |  505b  |  20 lines
  1. on exitFrame
  2.   global gLastRolledOn, gMoviePlayed
  3.   global gCastOfSprite15, gTimeCounter
  4.   global gDestLabel
  5.   puppetizerMan
  6.   puppetSprite 28, True
  7.   set gCastOfSprite15 = the name of cast (the castnum of sprite 15)
  8.   set gLastRolledOn = 0
  9.   set the timeoutScript to "FlyThruNew"
  10.   starttimer
  11.   set gTimeCounter = 1
  12.   repeat with i = 1 to 7
  13.     set lLabel = "Dest"&&string(i)
  14.     if label(lLabel) = the frame then
  15.       set gDestLabel = i
  16.       exit repeat
  17.     end if
  18.   end repeat
  19. end
  20.